home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 2003 May
/
PCWorld_2003-05_cd.bin
/
Software
/
Komercni
/
dispatcher
/
setup.exe
/
{app}
/
Tisk
/
MapaSez.hpr
/
MapaSez.txt
Wrap
Text File
|
2002-09-19
|
15KB
|
590 lines
object MapaSeznamZastavekRPT_1: TMapaSeznamZastavekRPT
Left = 250
Top = 157
Width = 834
Height = 695
Caption = 'MapaSeznamZastavekRPT'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Scaled = False
PixelsPerInch = 96
TextHeight = 13
object QuickRep1: TQuickRep
Left = 13
Top = 14
Width = 794
Height = 1123
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
DataSet = ADODataSet1
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
Functions.Strings = (
'PAGENUMBER'
'COLUMNNUMBER'
'REPORTTITLE')
Functions.DATA = (
'0'
'0'
#39#39)
Options = [FirstPageHeader, LastPageFooter]
Page.Columns = 1
Page.Orientation = poPortrait
Page.PaperSize = A4
Page.Values = (
100.000000000000000000
2970.000000000000000000
100.000000000000000000
2100.000000000000000000
100.000000000000000000
100.000000000000000000
0.000000000000000000)
PrinterSettings.Copies = 1
PrinterSettings.Duplex = False
PrinterSettings.FirstPage = 0
PrinterSettings.LastPage = 0
PrinterSettings.OutputBin = Auto
PrintIfEmpty = True
SnapToGrid = True
Units = MM
Zoom = 100
object QRBand1: TQRBand
Left = 38
Top = 38
Width = 718
Height = 497
Frame.Color = clNavy
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Frame.Width = 2
AlignToBottom = False
Color = clWhite
ForceNewColumn = False
ForceNewPage = False
Size.Values = (
1314.979166666667000000
1899.708333333333000000)
BandType = rbTitle
object Mapa: TQRImage
Left = 8
Top = 8
Width = 705
Height = 471
Frame.Color = clBlack
Frame.DrawTop = True
Frame.DrawBottom = True
Frame.DrawLeft = True
Frame.DrawRight = True
Size.Values = (
1246.187500000000000000
21.166666666666700000
21.166666666666700000
1865.312500000000000000)
Center = True
Stretch = True
end
end
object QRGroup2: TQRGroup
Left = 38
Top = 535
Width = 718
Height = 24
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
Color = clWhite
ForceNewColumn = False
ForceNewPage = False
Size.Values = (
63.500000000000000000
1899.708333333333000000)
Master = QuickRep1
ReprintOnNewPage = False
object QRLabel12: TQRLabel
Left = 17
Top = 4
Width = 68
Height = 16
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
42.333333333333300000
44.979166666666700000
10.583333333333300000
179.916666666667000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Soupiska m�st:'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -9
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 7
end
end
object QRBand2: TQRBand
Left = 38
Top = 559
Width = 718
Height = 18
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
Color = clWhite
ForceNewColumn = False
ForceNewPage = False
Size.Values = (
47.625000000000000000
1899.708333333333000000)
BandType = rbDetail
object QRDBText7: TQRDBText
Left = 265
Top = 1
Width = 32
Height = 16
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
42.333333333333300000
701.145833333333000000
2.645833333333330000
84.666666666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = ADODataSet1
DataField = 'name'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 8
end
object QRLabel57: TQRLabel
Left = 560
Top = 3
Width = 145
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
1481.666666666670000000
7.937500000000000000
383.645833333333000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = '....................................'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText1: TQRDBText
Left = 17
Top = 1
Width = 32
Height = 16
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
42.333333333333300000
44.979166666666700000
2.645833333333330000
84.666666666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = ADODataSet1
DataField = 'firma'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 8
end
end
object QRLabel41: TQRLabel
Left = 40
Top = 20
Width = 54
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
105.833333333333000000
52.916666666666700000
142.875000000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = '[:Firma:]'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel1: TQRLabel
Left = 648
Top = 20
Width = 105
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
1714.500000000000000000
52.916666666666700000
277.812500000000000000)
Alignment = taRightJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = '[:NazevSestavy:]'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 10
end
object QRBand6: TQRBand
Left = 38
Top = 577
Width = 718
Height = 24
Frame.Color = clBlack
Frame.DrawTop = True
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
Color = clWhite
ForceNewColumn = False
ForceNewPage = False
Size.Values = (
63.500000000000000000
1899.708333333333000000)
BandType = rbPageFooter
object QRLabel8: TQRLabel
Left = 0
Top = 3
Width = 260
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
0.000000000000000000
7.937500000000000000
687.916666666667000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Vyti�t�no programem Dispatcher 3, HI Software s.r.o.'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 8
end
object QRSysData2: TQRSysData
Left = 648
Top = 3
Width = 74
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
1714.500000000000000000
7.937500000000000000
195.791666666667000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
Color = clWhite
Data = qrsPageNumber
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
Text = 'Strana '
Transparent = False
FontSize = 8
end
end
object QRShape1: TQRShape
Left = 40
Top = 37
Width = 713
Height = 3
Frame.Color = clNavy
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
7.937500000000000000
105.833333333333000000
97.895833333333300000
1886.479166666670000000)
Brush.Color = clNavy
Shape = qrsRectangle
end
object T1: TQRLabel
Left = 112
Top = 8
Width = 8
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
296.333333333333000000
21.166666666666700000
21.166666666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = '3'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object T2: TQRLabel
Left = 152
Top = 8
Width = 8
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
402.166666666667000000
21.166666666666700000
21.166666666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = '0'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object T3: TQRLabel
Left = 192
Top = 8
Width = 15
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
508.000000000000000000
21.166666666666700000
39.687500000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = '24'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object NTS: TQRLabel
Left = 224
Top = 8
Width = 33
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
592.666666666667000000
21.166666666666700000
87.312500000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Mapa'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object idVerze: TQRLabel
Left = 320
Top = 8
Width = 8
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
846.666666666667000000
21.166666666666700000
21.166666666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = '3'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object Agenda: TQRLabel
Left = 344
Top = 8
Width = 8
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
910.166666666667000000
21.166666666666700000
21.166666666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = '4'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
end
object DataSource1: TDataSource
DataSet = ADODataSet1
Left = 7
Top = 75
end
object ADODataSet1: TADODataSet
CursorType = ctStatic
CommandText =
'SELECT roztrasy.klic, roztrasy.driver, roztrasy.driver1, roztras' +
'y.mistood, roztrasy.mistodo, cars.spz, cars.druhpaliva, cars.pru' +
'mers, cars.druhvozidla , drivers.ulice, drivers.obec, rozstop.na' +
'me FROM roztrasy, cars, drivers, rozstop WHERE (roztrasy.klic = ' +
'38) AND (roztrasy.idcar = cars.klic) AND (drivers.klic = roztras' +
'y.iddriver) AND (rozstop.idtrasa = roztrasy.klic) ORDER BY '#13#10'roz' +
'stop.klic;'
Parameters = <>
Left = 7
Top = 107
end
end